(ftfont_list_family): Initialize list var earlier.

diff --git a/src/ftfont.c b/src/ftfont.c
index c4463fa5c55882505cee9c04092067d58fbf6d8f..23f6a3672d5206ed037bf2a92618048f3d31a953 100644 (file)
--- a/src/ftfont.c
+++ b/src/ftfont.c
@@ -970,7 +970,7 @@ static Lisp_Object
 ftfont_list_family (frame)
      Lisp_Object frame;
 {
-  Lisp_Object list;
+  Lisp_Object list = Qnil;
   FcPattern *pattern = NULL;
   FcFontSet *fontset = NULL;
   FcObjectSet *objset = NULL;
@@ -992,7 +992,6 @@ ftfont_list_family (frame)
   if (! fontset)
     goto finish;
 
-  list = Qnil;
   for (i = 0; i < fontset->nfont; i++)
     {
       FcPattern *pat = fontset->fonts[i];